home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Languages / MPW Oberon 2.1168 / OInterfaces / Notification.mod < prev    next >
Encoding:
Text File  |  1995-08-10  |  2.1 KB  |  77 lines  |  [TEXT/MPS ]
  1. (*
  2.      File:        Notification.mod
  3.  
  4.      Contains:    Notification Manager interfaces
  5.  
  6.      Version:    Technology:    System 7.5
  7.                  Package:    Universal Interfaces 2.0 in “MPW Latest” on ETO #17
  8.  
  9.      Copyright:    © 1984-1995 by Apple Computer, Inc.
  10.                  All rights reserved.
  11.  
  12.      Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13.                  stack.  Include the file and version information (from above)
  14.                  in the problem description and send to:
  15.                      Internet:    apple.bugs.applelink.apple.com
  16.                      AppleLink:    APPLE.BUGS
  17.  
  18. *)
  19.  
  20. (*$TAGS-*)
  21. (*$CALLING PASCAL*)
  22. MODULE Notification;
  23.  
  24. IMPORT SYSTEM, Types, OSUtils;
  25.  
  26. (* $PUSH*)
  27. (* $ALIGN MAC68K*)
  28. (* $LibExport+*)
  29.     
  30. TYPE
  31.     NMRecPtr* = POINTER TO NMRec;
  32.  
  33.     NMProcPtr* = (*ΔΔ Types.ProcPtr;*) PROCEDURE (nmReqPtr: NMRecPtr);
  34.     NMUPP* = Types.UniversalProcPtr;
  35.  
  36.     NMRec* = RECORD
  37.         qLink*:                    OSUtils.QElemPtr;                                (* next queue entry*)
  38.         qType*:                    INTEGER;                                (* queue type -- ORD(nmType)* = 8*)
  39.         nmFlags*:                INTEGER;                                (* reserved*)
  40.         nmPrivate*:                LONGINT;                                (* reserved*)
  41.         nmReserved*:                INTEGER;                                (* reserved*)
  42.         nmMark*:                    INTEGER;                                (* item to mark in Apple menu*)
  43.         nmIcon*:                    Types.Handle;                                    (* handle to small icon*)
  44.         nmSound*:                Types.Handle;                                    (* handle to sound record*)
  45.         nmStr*:                    Types.StringPtr;                                (* string to appear in alert*)
  46.         nmResp*:                    NMUPP;                                    (* pointer to response routine*)
  47.         nmRefCon*:                LONGINT;                                (* for application use*)
  48.     END;
  49.  
  50. CONST
  51.     uppNMProcInfo* = $000000C0; (* PROCEDURE (4 byte param); *)
  52.  
  53. PROCEDURE CallNMProc*(nmReqPtr: NMRecPtr; userRoutine: NMUPP);
  54.     (*$IF NOT GENERATINGCFM*)
  55.     INLINE PASCAL $205F, $4E90;
  56.     (*$END*)
  57.  
  58. PROCEDURE NewNMProc*(userRoutine: NMProcPtr): NMUPP;
  59.     (*$IF NOT GENERATINGCFM *)
  60.     INLINE PASCAL $2E9F;
  61.     (*$END*)
  62.  
  63. PROCEDURE NMInstall*(nmReqPtr: NMRecPtr): Types.OSErr;
  64.     (*$IF NOT GENERATINGCFM*)
  65.     INLINE PASCAL $205F, $A05E, $3E80;
  66.     (*$END*)
  67. PROCEDURE NMRemove*(nmReqPtr: NMRecPtr): Types.OSErr;
  68.     (*$IF NOT GENERATINGCFM*)
  69.     INLINE PASCAL $205F, $A05F, $3E80;
  70.     (*$END*)
  71. (* ------------------ *)
  72.  
  73. (* $ALIGN RESET*)
  74. (* $POP*)
  75.  
  76.  END Notification.
  77.